home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Languages / PowerMacOberon 1.2 / System / ClockElems.Obj < prev    next >
Encoding:
Text File  |  1995-08-14  |  5.9 KB  |  15 lines  |  [TEXT/.Ob4]
  1. ¯6_
  2. 
  3. ˇ»àk$< NpClockElemsÇFŸ¿é≈w,B†›ÉInsertŸNew¿ÑÙÖ2ˆßæTexts6e∏uFiles;‚WêFonts;‚ÜDisplay2¯"TextFrames2¯fl<TextPrinter"…}nMath2ˆÊÃOberon;ı‰ƒViewers$Ù…/PrinterÜˇÏˇ‹    ˇΔˇï˛‚
  4. ˛≈
  5. ˛≠    ˝{˝w˝B    ˝#˝ˇˇ˚´¸Ù¸›¸Ÿ¸≥
  6. ¸Ñ¸y¸I    ¸W¸0ˇ¸$¸
  7. ¸˚”ˇ?˚æ˚¢ ˚úáGå†A33NewClockElems???C0?=÷wPC0ÄC0=÷wPà|¶ø¡ˇ¯êî!ˇ∞;·@êA;¿,û<@‰à æ<W√:êˇ¸oƒÄêǡº»"ˇ∏»Bˇ∞¸a(¿ÇˇƒÏ$ÚÄBˇ‰HÄAġ¸|". æ<W≈:|¬*êflˇ¸o«Äê‚ˇº»¢ˇ∏»¬ˇ∞¸Â0(¡ˇ¨Ï(ÚÄBˇ‰HÄAÄflˇ¸–&3fiC‡ˇxÄÄ!|¶ª¡ˇ¯O‡ |¶øÅˇêî!ˇ∞;·8êA;£;ƒ8}8ù ÄBˇËHÄAÉùWàæ±â6pU*æ±]ãfpUl˛±ù®}8Ä |"◊|†¶@‡0• ≈®˝9 }'B◊@‡1)ˇˇ}FJ±]ìùÄ Ä!|¶ªÅˇO‡ |¶øÅˇêî!ˇ∞;·8êA;£;ƒ©}Ul02®}|åTÖ02®›Ö28|Äù ÄBˇËHÄAÄ Ä!|¶ªÅˇO‡ |¶ø!ˇ‰êî!ˇ†;·@êA;√;§;Ö;f;G;(롸8z8û8º8ŸÄBˇÿHÄA8z8û8ª8ŸÄBˇÿKˇ˝ÒÄA8z8ù8º8ŸÄBˇÿKˇ˝’ÄA8z8ù8ª8ŸÄBˇÿKˇ˝πÄAÄ(Ä!|¶ª!ˇ‰O‡ |¶æ°ˇ‘êî!ˇà;·8êA;√;§;Ö;f;G;<;0˘ˇˇT˜8W82»Wâ:"©¿@˘h|y|û |∏Ë|›¬8˚99Kˇ˛Ÿ|x|û¬|πË|› 8˚99Kˇ˛π~µ≤2÷3/ïA¸~∑®2˜ˇ¯39ˇˇC‡ˇò|ô¿@Ê$|y|û |∏Ë|›¬8˚99Kˇ˛mÄHÄ!|¶∫°ˇ‘O‡ |¶æaˇÃêî!ˇÄ;·8êA;√;§;Ö;f;G;(}]ÿ}|
  8. X@¯;;‹;ò:˝;ª;w}û‡Uñ<|}ÿTu<;:˝:`ï∞@˝\~¥p,ñ@‰ :`ˇˇ~÷–ÿA˘<8z8ò8∑8ŸÄBˇÿKˇ˝ùÄA2˜~ñ†/î@¸ ~î™öC‡ˇƒC‡X~‘p,ï@‰ :`ˇˇ~µ–‡A˘<8z8ò8∑8ŸÄBˇÿKˇ˚·ÄA3~ï†/î@¸ ~î≤~˜öC‡ˇƒÄPÄ!|¶∫aˇÃO‡ |¶øAˇËêî!ˇ∞;·8êA;√;§;Ö;f;G8~8ù8ºÄBˇHÄAÄ Ä!|¶ªAˇËO‡ |¶ø!ˇ‰êî!ˇ®;·8êA;√;§;Ö;f;G;(8~8ù8º8€ÄBˇHÄAÄ(Ä!|¶ª!ˇ‰O‡ |¶æ°ˇ‘êî!ˇê;·8êA;√;§;Ö;f;G;( û8†<|*◊¿¶@‡3fi<ofÄê¬ˇº…"ˇ∏…Bˇ∞˝iP( æ<W«:}:¡à¡¢ˇ®Ï k:¸ éˇ¿Lˇ‡L»Bˇ†¸b*ÿb¸
  9. é´oiÄë"ˇº»Çˇ∏»¢ˇ∞¸ƒ(( æ<W :|‚T.¡ˇúÌ&A˙˝@éˇ¿Lˇ‡L…bˇ†˝ãH*ŸÇ¸U陂oKÄëbˇº…¢ˇ∏»ˇ∞¸-( æ<WÃ:|bb¿C¿bˇòÏÅ∫¸†éˇ¿Lˇ‡L»¬ˇ†¸Ê *ÿ‚¸-陬oDÄêǡº…ˇ∏…"ˇ∞˝HH( æ<W≈:}b,.¡ÇˇîÌ™b˙¸éˇ¿Lˇ‡L»"ˇ†¸Ah*ÿB¸院|}¬|ú∫|Ω≤|‹™8˘9į|    ¶ÄB¸O‡!ÄAÄ@Ä!|¶∫°ˇ‘O‡ |¶æ°ˇ‘êî!ˇê;·8êA;£;ƒ;Ö;f;G;(,ö A‰Ï⁄8‡ :◊@‡3ˇˇ    9  ~ËJ◊@‡2˜ˇˇZ
  10. 9` ~ Z◊@‡2÷ˇˇ:†/<@¯(8u8ú8ª8◊8˙9Kˇ˝π2µC‡ˇÿ®}8ú8ª|⁄∏8ˆ9Kˇ˝ï®}8ú8ª8¿8˜9Kˇ˝y®}8ú8ª8¿8¯9Kˇ˝]8|8õ8†8Ÿ8‡Ä|    ¶ÄBO‡!ÄA8|8õ8∫8Ÿ8‡Ä|    ¶ÄBO‡!ÄAÄ@Ä!|¶∫°ˇ‘O‡ |¶æÅˇ–êî!ˇê;·8êA;£;ƒ;e;Ü;G;(;    :Í/ò A¸ò8` ~Ã◊@‡2÷ˇˇò    8† ~§*◊@‡2µˇˇÿ
  11. 8‡ ~Ü:◊@‡2©©;|àHAÊ<®}8ö8π|ÿ®8Ù9Kˇ¸Q®{8ö8π|ÿ®8Ù9Kˇ¸5©]©{
  12. XA˙<®}8ö8π8¿8ı9Kˇ¸    ®{8ö8π8¿8ı9Kˇ˚Ì©ù®{åA˛<®}8ö8π8¿8ˆ9Kˇ˚¡®{8ö8π8¿8ˆ9Kˇ˚•Ä@Ä!|¶∫Åˇ–O‡ |¶ø!ˇ‰êî!ˇà;·8êA;√;Ñ;•;@Äǡ¯ÄΩˇÙ|Ö @Êå<¿8ÊꂯêB¸=9(ë"êB û©^ }[p8b‰Äǡ¸Åbˇ¯ÅùˇÙlX8ºÄ¬ˇ¸ û®˛|Á⁄ û©
  13. }⁄9;Å^ˇ¸ÅbˇÙÅäˇÙlX ûâ^}JtKˇ˝·C‡hÅbˇËÅãˇ‰Ä}ˇÙ`@˙TÄǡËħˇ‰Ä›ˇÙf(®¸/á@˛8ÅˇË8h,Å"ˇËÄâˇËÅBˇË8™ ÅbˇËÄÀˇÏ®¸©ÄBˇËHÄAÄHÄ!|¶ª!ˇ‰O‡ |¶ø!ˇ‰êî!ˇò;·8êA;√;Ñ;•;`;@Åǡ‹Älˇ¸ÄùˇÙ|Ñ@ÊÄ¢ˇ‹Ä≈ˇ¸Ä˝ˇÙg0â!(/    A˙‰=@9jëb¯êB¸=Ä8lêbêB ûÄû8†'|ƒ*◊@‡0Δˇˇ0Êˇˇ|Ëp;(8b‰Äǡ¸©<|© ©\|  8˘â|}htKˇ˚=ÄbˇÙÄBˇ»HÄA;C ö©ú±ö ö®|∞z
  14. öW$<0§∞∫ ö ö®⁄ ∞⁄ ö<‡9ëêZ öâ<}*tôZì\C‡–Åbˇ‡Åãˇ¸Ä}ˇÙÉ`@˛îÄǡ‡Ä§ˇ¸Ä›ˇÙf(à¸!,àAÊp= 9IëB¯êB¸=`9ãëÇêB ûÄ~8Ä Ë|£"◊@‡0•ˇˇ0≈ˇˇ|«p;'8b‰Äǡ¸©|® ©<|… 8˘â\
  15. }HtKˇ˙%C‡,ÅbˇÃÅãˇ‰Ä}ˇÙ`@˙HÄǡÃÄdˇÏÄBˇ»KˇÙÄA;c8~8õÄBˇÃHÄAÄ¢ˇÃÄ≈ˇ‰Ä˝ˇÙg0ì|C‡‘ÅˇÃÅ(ˇ‹Å]ˇÙäH@˛HÅbˇÃÅãˇ‹Ä}ˇÙc`8¸ˇ¸9ˇàÄàÄ®êáêß98Á |à™|á™ÅǡÑëú C‡|ÄbˇÃÄɡ‡ÄΩˇÙ|Ö @ÊhĬˇÃÄÊˇ‡ÅˇÙh8©</    @˙$8|ÅBˇ–ÄäˇÙ8ø
  16. ÄBˇ–HÄAC‡,©|/ã@˛ 8|Åǡ–ÄåˇÙ8†ÄBˇ–HÄAÄ8Ä!|¶ª!ˇ‰O‡ |¶ø·ˇ¸êî!ˇ∞;·8êAÄBˇËHÄAÄLJ|É A‰à8Äǡ¸KˇÚMÄøĬÏ0A˙XÄBˇËKˇÒ≠ÄA0„ꂇ8Äǡ¯ÄBˇÏHÄA9b‡9üÅ Å,ë Ö ï+Å,ë ë+C‡ÄBˇËKˇÒyÄA0cêb‡Ä Ä!|¶ª·ˇ¸O‡ |¶ø·ˇ¸êî!ˇ¿;·8êAÄǡÃÄdˇÏÄBˇ»KˇÚÂÄAÄ¢ˇÃêeĬˇÃÄÊ á=9(ë'êG ÄÄ!|¶ª·ˇ¸O‡ |¶ø°ˇÙ9Åˇ‡Hêî!˛P;·8êA;†ìø\ìø ìøìø ìø8ÅBˇÃÄ䡑ÅbˇËÄ´d ÖÄ•ÅǡËÄÃd ÜÄΔ ÄBˇÃHÄA8ÄǡÃÄÑˇ‘ÄBˇÃHÄA®ø./Ö@˛8®fl0,Ü@Ê,ġ4/@˘ Å4m    Äë"ˇº»bˇ∏»Çˇ∞ˇ„ (C‡8©_./ä@˛(©0,ã@Ê¿ø8¿¬ˇÄˇ0@˘ √ˇ8C‡√‚ˇ|¿‚ˇxÌÚ˝ éˇ¿Lˇ‡L…Bˇ†˝j@*Ÿb¸Méɬ ÅǡÃÄlˇÏÄBˇ»Kˇ›ÄA;£ ùì› ùì› ù<`8Éêùê] ìø\Ä¢ˇËÄe\8ü\Ĭˇ‹Ä¶ˇ‰Ä‚ˇËÅ\ àÄ|    ¶ÄHO‡!ÄAÄÄÄ!9Åˇ‡H|¶ª°ˇÙO‡ |¶ø·ˇ¸êî!ˇ¿;·8êAKˇÓ—9 ë"‡8b‰Äǡ¸KˇÔyÅBˇËÄjˇ‡ÄBˇ»KˇÔmÄAêbÙÅbÙ ã9ÄôãÄbÙ É<Ä8§ê£ êCÄbÙÄBˇËHÄAÄÄ!|¶ª·ˇ¸O‡ âˇ¸ˇˇˇˇTimeˇ¯ˇ¯NotifyMsgˇÙˇÙä    qÑñ©çîóö°¢Øÿ½ +R]sœÏ(*,9Y]ã¯/¿Init·{i¯Ÿ8GetTime„{t¯Ú8SetTime„{t¯† ¿Dot4Â{colorÊ{mode·{x1‚{x2„{y1‰{y2¯›¿8SCircle‰{colorÍ{dË{dxÈ{dyÂ{mode„{rÊ{x·{x0Á{y‚{y0¯¨»8SLineÂ{colorÎ{dÈ{dxÍ{dyÏ{incÊ{modeÁ{x·{x1„{x2Ë{y‚{y1‰{y2¯¬8PCircle‰{colorÂ{mode„{r·{x0‚{y0¯⁄ 8PLineÂ{colorÊ{mode·{x1„{x2‚{y1‰{y2¯Δ88Line2·{angÊ{color‰{r1Â{r2‚{x0Á{x1È{x2„{y0Ë{y1Í{y2¯ù88DrawÊ{colorÍ{iÂ{rÁ{rhË{rmÈ{rs„{x0‰{y0¯˜88UpdateË{colorÁ{rÈ{rhÍ{rmÎ{rsÂ{x0Ê{y0¯≈¿8HandleFrame
  17. ·{F
  18. Â{VÊ{ch‰{r¯é08HandleElem
  19. ‰{CopyOfE
  20. ·{E
  21. Â{F
  22. chÊ{r¯¿8Clock¯Ÿ8New¯Δ¯8Insert
  23. ‚{E†{r·{w¯Î8$$
  24. ÙTask‡wakeUp